home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr25 / gnuplsrc.zip / PATCHES.OS2 < prev    next >
Text File  |  1993-03-21  |  15KB  |  612 lines
  1. *** command.c    1992/07/23 10:26:10    3.26
  2. --- command.c    1992/07/23 11:26:18
  3. ***************
  4. *** 84,90 ****
  5. --- 84,94 ----
  6.   #ifdef AMIGA_LC_5_1
  7.   #define HELPFILE "S:gnuplot.gih"
  8.   #else
  9. + #ifdef OS2
  10. + #define HELPFILE "gnuplot.gih"
  11. + #else
  12.   #define HELPFILE "docs/gnuplot.gih" /* changed by makefile */
  13. + #endif /* OS2 */
  14.   #endif /* AMIGA_LC_5_1 */
  15.   #endif /* HELPFILE */
  16.   
  17. ***************
  18. *** 103,108 ****
  19. --- 107,118 ----
  20.    */
  21.   extern struct gnuplot_contours *contour();
  22.   
  23. + #ifdef OS2
  24. + /* emx has getcwd, chdir that can handle drive names */
  25. + #define getcwd _getcwd2
  26. + #define chdir  _chdir2
  27. + #endif /* OS2 */
  28. + 
  29.   #if defined(unix) && !defined(hpux)
  30.   #ifdef GETCWD
  31.   extern char *getcwd();    /* some Unix's use getcwd */
  32. ***************
  33. *** 3314,3332 ****
  34.   }
  35.   #else /* VFORK */
  36.   
  37. ! #ifdef AMIGA_LC_5_1
  38.   do_shell()
  39.   {
  40.   register char *shell;
  41.       if (!(shell = getenv("SHELL")))
  42.           shell = SHELL;
  43. - 
  44.       if (system(shell))
  45.           os_error("system() failed",NO_CARET);
  46.   
  47.       (void) putc('\n',stderr);
  48.   }
  49. ! #else /* AMIGA_LC_5_1 */
  50.   
  51.   #define EXEC "exec "
  52.   do_shell()
  53. --- 3324,3348 ----
  54.   }
  55.   #else /* VFORK */
  56.   
  57. ! #if defined( AMIGA_LC_5_1 ) || defined ( OS2 )
  58.   do_shell()
  59.   {
  60.   register char *shell;
  61. + #ifdef OS2
  62. +     if (!(shell = getenv("COMSPEC")))   /* shouldn't fail, but .. */
  63. +         shell = "c:\\os2\\cmd.exe"; /* try default ? */
  64. +     if (system(shell)==-1)              /* emx returns -1 for error, else */
  65. +                                             /* code from spawn, so trap it */
  66. + #else
  67.       if (!(shell = getenv("SHELL")))
  68.           shell = SHELL;
  69.       if (system(shell))
  70. + #endif /* OS2 */
  71.           os_error("system() failed",NO_CARET);
  72.   
  73.       (void) putc('\n',stderr);
  74.   }
  75. ! #else /* AMIGA_LC_5_1, OS2 */
  76.   
  77.   #define EXEC "exec "
  78.   do_shell()
  79. *** graph3d.c    1992/07/19 12:27:44    3.26
  80. --- graph3d.c    1992/07/23 11:26:36
  81. ***************
  82. *** 780,785 ****
  83. --- 780,789 ----
  84.   {
  85.   int len,x1,y1,x2,y2;
  86.   register double xr,xnorm,tics,tic,l10;
  87. + #ifdef OS2
  88. + /* GCC has problems with x?y:z below, so work around */
  89. + int temp ;
  90. + #endif
  91.   
  92.       xr = fabs(tmin-tmax);
  93.   
  94. ***************
  95. *** 804,819 ****
  96. --- 808,839 ----
  97.           return -1.0;                              /* No tics! */
  98.   
  99.       l10 = log10(xr);
  100. + #ifdef OS2
  101. +                 if( l10 >= 0.0 ) temp = (int) l10 ;
  102. +                 else temp = (int)l10 - 1 ;
  103. + #endif
  104.       if (logscale) {
  105. + #ifdef OS2
  106. +                 tic = dbl_raise(10.0,temp);
  107. + #else
  108.           tic = dbl_raise(10.0,(l10 >= 0.0 ) ? (int)l10 : ((int)l10-1));
  109. + #endif
  110.           if (tic < 1.0)
  111.               tic = 1.0;
  112.       } else {
  113. + #ifdef OS2
  114. +         xnorm = pow(10.0,l10-(double)temp);
  115. + #else
  116.           xnorm = pow(10.0,l10-(double)((l10 >= 0.0 ) ? (int)l10 : ((int)l10-1)));
  117. + #endif
  118.           if (xnorm <= 5)
  119.               tics = 0.5;
  120.           else tics = 1.0;
  121. + #ifdef OS2
  122. +         tic = tics * dbl_raise(10.0,temp);
  123. + #else
  124.           tic = tics * dbl_raise(10.0,(l10 >= 0.0 ) ? (int)l10 : ((int)l10-1));
  125. + #endif
  126.       }
  127.       return(tic);
  128.   }
  129. *** graphics.c    1992/07/19 11:21:58    3.26
  130. --- graphics.c    1992/07/23 11:45:48
  131. ***************
  132. *** 177,198 ****
  133.   BOOLEAN logscale;
  134.   {
  135.   register double xr,xnorm,tics,tic,l10;
  136. ! 
  137.       xr = fabs(tmin-tmax);
  138.       
  139.       l10 = log10(xr);
  140.       if (logscale) {
  141.           tic = dbl_raise(10.0,(l10 >= 0.0 ) ? (int)l10 : ((int)l10-1));
  142.           if (tic < 1.0)
  143.               tic = 1.0;
  144.       } else {
  145.           xnorm = pow(10.0,l10-(double)((l10 >= 0.0 ) ? (int)l10 : ((int)l10-1)));
  146.           if (xnorm <= 2)
  147.               tics = 0.2;
  148.           else if (xnorm <= 5)
  149.               tics = 0.5;
  150.           else tics = 1.0;    
  151.           tic = tics * dbl_raise(10.0,(l10 >= 0.0 ) ? (int)l10 : ((int)l10-1));
  152.       }
  153.       return(tic);
  154.   }
  155. --- 176,216 ----
  156.   BOOLEAN logscale;
  157.   {
  158.   register double xr,xnorm,tics,tic,l10;
  159. ! #ifdef OS2
  160. ! /* GCC has problems with x?y:z below, so work around */
  161. ! int temp ;
  162. ! #endif
  163.       xr = fabs(tmin-tmax);
  164.       
  165.       l10 = log10(xr);
  166. + #ifdef OS2
  167. +                 if( l10 >= 0.0 ) temp = (int) l10 ;
  168. +                 else temp = (int)l10 - 1 ;
  169. + #endif
  170.       if (logscale) {
  171. + #ifdef OS2
  172. +                 tic = dbl_raise(10.0,temp);
  173. + #else
  174.           tic = dbl_raise(10.0,(l10 >= 0.0 ) ? (int)l10 : ((int)l10-1));
  175. + #endif
  176.           if (tic < 1.0)
  177.               tic = 1.0;
  178.       } else {
  179. + #ifdef OS2
  180. +         xnorm = pow(10.0,l10-(double)temp);
  181. + #else
  182.           xnorm = pow(10.0,l10-(double)((l10 >= 0.0 ) ? (int)l10 : ((int)l10-1)));
  183. + #endif
  184.           if (xnorm <= 2)
  185.               tics = 0.2;
  186.           else if (xnorm <= 5)
  187.               tics = 0.5;
  188.           else tics = 1.0;    
  189. + #ifdef OS2
  190. +         tic = tics * dbl_raise(10.0,temp);
  191. + #else
  192.           tic = tics * dbl_raise(10.0,(l10 >= 0.0 ) ? (int)l10 : ((int)l10-1));
  193. + #endif
  194.       }
  195.       return(tic);
  196.   }
  197. *** help.c    1992/07/19 13:24:27    3.26
  198. --- help.c    1992/07/23 11:26:50
  199. ***************
  200. *** 38,43 ****
  201. --- 38,48 ----
  202.    *  bug-gnuplot@ames.arc.nasa.gov.
  203.    */
  204.   
  205. + #ifdef OS2
  206. + /* GCC defines unix, but no PAGER, so... */
  207. + #undef unix
  208. + #endif
  209. +  
  210.   #include <stdio.h>
  211.   
  212.   extern int errno;
  213. *** parse.c    1992/07/22 10:31:24    3.26
  214. --- parse.c    1992/07/23 11:27:06
  215. ***************
  216. *** 70,76 ****
  217.   #ifdef __TURBOC__
  218.   void fpe()
  219.   #else
  220. ! #if defined( __ZTC__ ) || defined( _CRAY ) || defined( sgi )
  221.   void fpe(an_int)
  222.   int an_int;
  223.   #else
  224. --- 70,76 ----
  225.   #ifdef __TURBOC__
  226.   void fpe()
  227.   #else
  228. ! #if defined( __ZTC__ ) || defined( _CRAY ) || defined( sgi ) || defined (OS2)
  229.   void fpe(an_int)
  230.   int an_int;
  231.   #else
  232. ***************
  233. *** 91,97 ****
  234. --- 91,101 ----
  235.   #ifdef PC    /* thanks to lotto@wjh12.UUCP for telling us about this  */
  236.       _fpreset();
  237.   #endif
  238. + #ifdef OS2
  239. +     (void) signal(an_int, SIG_ACK);
  240. + #else
  241.       (void) signal(SIGFPE, fpe);
  242. + #endif
  243.       undefined = TRUE;
  244.       longjmp(fpe_env, TRUE);
  245.   }
  246. *** plot.c    1992/07/19 10:52:50    3.26
  247. --- plot.c    1992/07/23 11:27:12
  248. ***************
  249. *** 139,149 ****
  250.   #define HOME "sys$login:"
  251.   
  252.   #else /* vms */
  253. ! #ifdef MSDOS
  254.   
  255.   #define HOME "GNUPLOT"
  256.   
  257. ! #else /* MSDOS */
  258.   
  259.   #if defined(AMIGA_AC_5) || defined(AMIGA_LC_5_1)
  260.   
  261. --- 139,149 ----
  262.   #define HOME "sys$login:"
  263.   
  264.   #else /* vms */
  265. ! #if defined(MSDOS) || defined(OS2)
  266.   
  267.   #define HOME "GNUPLOT"
  268.   
  269. ! #else /* MSDOS, OS2 */
  270.   
  271.   #if defined(AMIGA_AC_5) || defined(AMIGA_LC_5_1)
  272.   
  273. ***************
  274. *** 156,163 ****
  275. --- 156,169 ----
  276.   #endif /* MSDOS */
  277.   #endif /* vms */
  278.   
  279. + 
  280.   #ifdef unix
  281. + #ifdef OS2
  282. + /* emx defines unix, but use ms-dos style file */
  283. + #define PLOTRC "gnuplot.ini"
  284. + #else
  285.   #define PLOTRC ".gnuplot"
  286. + #endif /* OS2 */
  287.   #else /* unix */
  288.   #if defined(AMIGA_AC_5) || defined(AMIGA_LC_5_1)
  289.   #define PLOTRC ".gnuplot"
  290. ***************
  291. *** 173,179 ****
  292.   void inter(an_int)
  293.   int an_int;
  294.   #else
  295. ! #ifdef NEXT
  296.   void inter(int an_int)
  297.   #else
  298.   #ifdef sgi
  299. --- 179,185 ----
  300.   void inter(an_int)
  301.   int an_int;
  302.   #else
  303. ! #if defined( NEXT ) || defined ( OS2 )
  304.   void inter(int an_int)
  305.   #else
  306.   #ifdef sgi
  307. ***************
  308. *** 193,199 ****
  309. --- 199,209 ----
  310.       (void) signal(SIGINT, ss_interrupt);
  311.   #endif
  312.   #else  /* MSDOS */
  313. + #ifdef OS2
  314. +     (void) signal(an_int, SIG_ACK);
  315. + #else
  316.       (void) signal(SIGINT, inter);
  317. + #endif  /* OS2 */
  318.   #endif  /* MSDOS */
  319.       (void) signal(SIGFPE, SIG_DFL);    /* turn off FPE trapping */
  320.       if (term && term_init)
  321. ***************
  322. *** 322,327 ****
  323. --- 332,340 ----
  324.       register FILE *plotrc;
  325.       static char home[80];
  326.       static char rcfile[sizeof(PLOTRC)+80];
  327. + #ifdef OS2
  328. +     char *temp ;
  329. + #endif /*OS2*/
  330.   
  331.       /* Look for a gnuplot init file in . or home directory */
  332.   #ifdef vms
  333. ***************
  334. *** 340,346 ****
  335. --- 353,366 ----
  336.              }
  337.       }
  338.   #else /* AMIGA */
  339. + #ifdef OS2
  340. + /*strcpy() can't manage NULL arg */
  341. +     temp = getenv(HOME) ;
  342. +     if( temp == NULL ) temp="/gnuplot" ; /* set a default */
  343. +     (void) strcat(strcpy(home,temp),"/");
  344. + #else /*OS2*/
  345.       (void) strcat(strcpy(home,getenv(HOME)),"/");
  346. + #endif
  347.   #endif /* AMIGA */
  348.   #endif /* vms */
  349.   #ifdef NOCWDRC
  350. *** plot.h    1992/07/19 10:34:16    3.26
  351. --- plot.h    1992/07/23 11:27:16
  352. ***************
  353. *** 107,115 ****
  354.   
  355.   
  356.   #ifdef unix
  357.   #define OS "unix "
  358.   #endif
  359. ! 
  360.   
  361.   #ifdef MSDOS
  362.   #define OS "MS-DOS "
  363. --- 107,121 ----
  364.   
  365.   
  366.   #ifdef unix
  367. + #ifdef OS2
  368. + #define OS "OS-2 "
  369. + #ifdef NOPIPE
  370. + #undef unix
  371. + #endif
  372. + #else
  373.   #define OS "unix "
  374.   #endif
  375. ! #endif
  376.   
  377.   #ifdef MSDOS
  378.   #define OS "MS-DOS "
  379. ***************
  380. *** 147,156 ****
  381. --- 153,167 ----
  382.   #include <math.h>
  383.   #define VERYLARGE HUGE
  384.   #else
  385. + #if defined (OS2)
  386. + /* emx seems to screw up if all digits here */
  387. + #define VERYLARGE (1.79769313e+308) 
  388. + #else
  389.   #define VERYLARGE HUGE
  390.   #endif
  391.   #endif
  392.   #endif
  393. + #endif
  394.   
  395.   
  396.   #define END_OF_COMMAND (c_token >= num_tokens || equals(c_token,";"))
  397. ***************
  398. *** 172,178 ****
  399.   #endif /* vms */
  400.   
  401.   /* If you don't have vfork, then undefine this */
  402. ! #if defined(NOVFORK) || defined(MSDOS)
  403.   # undef VFORK
  404.   #else
  405.   # ifdef unix
  406. --- 183,189 ----
  407.   #endif /* vms */
  408.   
  409.   /* If you don't have vfork, then undefine this */
  410. ! #if defined(NOVFORK) || defined(MSDOS) || defined(OS2)
  411.   # undef VFORK
  412.   #else
  413.   # ifdef unix
  414. ***************
  415. *** 190,196 ****
  416.   #ifdef vms
  417.   # define memcpy(dest,src,len) lib$movc3(&len,src,dest)
  418.   #else
  419. ! # if defined(MEMCPY) || defined(MSDOS)
  420.      /* use memcpy directly */
  421.   # else 
  422.   #  ifdef NOCOPY
  423. --- 201,207 ----
  424.   #ifdef vms
  425.   # define memcpy(dest,src,len) lib$movc3(&len,src,dest)
  426.   #else
  427. ! # if defined(MEMCPY) || defined(MSDOS)  || defined (OS2)
  428.      /* use memcpy directly */
  429.   # else 
  430.   #  ifdef NOCOPY
  431. ***************
  432. *** 206,217 ****
  433.    * In case you have MEMSET instead of BZERO. If you have something 
  434.    * else, define bzero to that something.
  435.    */
  436. ! #if defined(MEMSET) || defined(MSDOS)
  437.   #define bzero(dest,len)  (void)(memset(dest, (char)NULL, len))
  438.   #endif /* MEMSET || MSDOS */
  439.   
  440.   /* Give the name of your gamma function, or undefine it if you have none.  */
  441. ! #if defined(NOGAMMA) || defined(MSDOS)
  442.   # undef GAMMA
  443.   #else
  444.   # ifndef GAMMA
  445. --- 217,228 ----
  446.    * In case you have MEMSET instead of BZERO. If you have something 
  447.    * else, define bzero to that something.
  448.    */
  449. ! #if defined(MEMSET) || defined(MSDOS) || defined(OS2)
  450.   #define bzero(dest,len)  (void)(memset(dest, (char)NULL, len))
  451.   #endif /* MEMSET || MSDOS */
  452.   
  453.   /* Give the name of your gamma function, or undefine it if you have none.  */
  454. ! #if defined(NOGAMMA) || defined(MSDOS) || defined(OS2)
  455.   # undef GAMMA
  456.   #else
  457.   # ifndef GAMMA
  458. *** readline.c    1992/07/21 17:25:16    3.26
  459. --- readline.c    1992/07/23 11:27:38
  460. ***************
  461. *** 147,152 ****
  462. --- 147,186 ----
  463.       /* get characters */
  464.       for(;;) {
  465.           cur_char = getc(stdin);
  466. + #ifdef OS2
  467. + /* for emx: remap scan codes for cursor keys */
  468. +                 if( cur_char == 0 ) {
  469. +                     cur_char = getc(stdin);
  470. +                     switch( cur_char){
  471. +                         case 75:  /* left, map to ^B */
  472. +                             cur_char=2;
  473. +                             break ;
  474. +                         case 77:  /* right, map to ^F */
  475. +                             cur_char=6;
  476. +                             break ;
  477. +                         case 115: /* ctrl left */
  478. +                         case 71:  /* home, map to ^A */
  479. +                             cur_char=1;
  480. +                             break ;
  481. +                         case 116: /* ctrl right */
  482. +                         case 79:  /* end, map to ^E */
  483. +                             cur_char=5;
  484. +                             break ;
  485. +                         case 72:  /* up, map to ^P */
  486. +                             cur_char=16;
  487. +                             break ;
  488. +                         case 80:  /* down, map to ^N */
  489. +                             cur_char=14;
  490. +                             break ;
  491. +                         case 83:  /* delete, map to ^D */
  492. +                             cur_char=4;
  493. +                             break ;
  494. +                         default:  /* ignore */
  495. +                             cur_char=0;
  496. +                             continue ;
  497. +                             }
  498. +                         }
  499. + #endif  /*OS2*/
  500.           if(isprint(cur_char)) {
  501.               int i;
  502.               for(i=max_pos; i>cur_pos; i--) {
  503. ***************
  504. *** 522,527 ****
  505. --- 556,565 ----
  506.   
  507.           rl_termio.c_lflag &= ~(ICANON|ECHO|ECHOE|ECHOK|ECHONL|NOFLSH);
  508.           rl_termio.c_lflag |=  (ISIG);
  509. + #ifdef OS2
  510. + /* for emx: remove default terminal processing */
  511. +                 rl_termio.c_lflag &= ~(IDEFAULT);
  512. + #endif /* OS2 */
  513.   
  514.           rl_termio.c_cc[VMIN] = 1;
  515.           rl_termio.c_cc[VTIME] = 0;
  516. *** scanner.c    1992/07/19 13:24:18    3.26
  517. --- scanner.c    1992/07/24 14:38:08
  518. ***************
  519. *** 251,257 ****
  520.   }
  521.   
  522.   
  523. ! #ifdef MSDOS
  524.   
  525.   #ifdef __ZTC__
  526.   substitute(char *str,int max)
  527. --- 251,257 ----
  528.   }
  529.   
  530.   
  531. ! #if defined(MSDOS) || defined (NOPIPE)
  532.   
  533.   #ifdef __ZTC__
  534.   substitute(char *str,int max)
  535. ***************
  536. *** 322,328 ****
  537. --- 322,332 ----
  538.   
  539.       i = 0;
  540.       while ((c = getc(f)) != EOF) {
  541. + #ifdef OS2
  542. +         output[i++] = (((c=='\n')||(c=='\r')) ? ' ' : c);    /* newlines become blanks*/
  543. + #else
  544.           output[i++] = ((c == '\n') ? ' ' : c);    /* newlines become blanks*/
  545. + #endif
  546.           if (i == max) {
  547.   #ifdef AMIGA_AC_5
  548.               (void) close(fd);
  549. *** term.c    1992/07/19 10:15:18    3.26
  550. --- term.c    1992/07/23 11:27:32
  551. ***************
  552. *** 255,260 ****
  553. --- 255,264 ----
  554.   #include "term/pc.trm"
  555.   #endif
  556.   
  557. + #ifdef OS2PM                    /* os/2 presentation manager */
  558. + #include "term/pm.trm"
  559. + #endif
  560. + 
  561.   /*
  562.      all TEK types (TEK,BITGRAPH,KERMIT,VTTEK,SELANAR) are ifdef'd in tek.trm,
  563.      but most require various TEK routines.  Hence TEK must be defined for
  564. ***************
  565. *** 952,957 ****
  566. --- 956,970 ----
  567.          PPMgraphics, PBMmove, PBMvector, PPMlinetype,
  568.          PBMput_text, PBMtext_angle, null_justify_text, do_point,
  569.          do_arrow}
  570. + #endif
  571. + 
  572. + #ifdef OS2PM
  573. +     ,{"pm", "OS/2 Presentation Manager",
  574. +        PM_XMAX, PM_YMAX, PM_VCHAR, PM_HCHAR, 
  575. +        PM_VTIC, PM_HTIC, options_null, PM_init, PM_reset, 
  576. +        PM_text, null_scale, PM_graphics, PM_move, PM_vector,
  577. +        PM_linetype, PM_put_text, PM_text_angle, 
  578. +        PM_justify_text, line_and_point, do_arrow}
  579.   #endif
  580.   
  581.   #ifdef POSTSCRIPT
  582. *** term.h    1992/07/19 10:15:29    3.26
  583. --- term.h    1992/07/23 11:27:22
  584. ***************
  585. *** 49,55 ****
  586.    */
  587.   
  588.   /* These terminals are not relevant for MSDOS */
  589. ! #ifndef MSDOS
  590.   
  591.   #ifdef AMIGA_LC_5_1
  592.   #define AMIGASCREEN    /* Amiga custom screen */
  593. --- 49,55 ----
  594.    */
  595.   
  596.   /* These terminals are not relevant for MSDOS */
  597. ! #if !defined(MSDOS) && !defined(OS2)
  598.   
  599.   #ifdef AMIGA_LC_5_1
  600.   #define AMIGASCREEN    /* Amiga custom screen */
  601. ***************
  602. *** 131,134 ****
  603. --- 131,138 ----
  604.   #define HERCULES    /* IBM PC/Clone with Hercules graphics board */
  605.   #endif /* __TURBOC__ */
  606.   #endif /* MSDOS */
  607. + 
  608. + #ifdef OS2
  609. + #define OS2PM
  610. + #endif
  611.   
  612.